home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Arsenal Files 8
/
The Arsenal Files Collection #8 (Arsenal Computer) (1996).ISO
/
prg_casm
/
snip9611.zip
/
FAVAIL.C
< prev
next >
Wrap
C/C++ Source or Header
|
1996-11-24
|
1KB
|
62 lines
/* +++Date last modified: 02-Nov-1995 */
/*
** Find out how many more files can be fopen'ed
**
** public domain demo by Bob Stout
*/
#include "dosfiles.h"
#if defined(__TURBOC__)
#define STREAM_BUF _streams
#define FCNT FOPEN_MAX
#define FLAG flags
#elif defined(__WATCOMC__)
#define STREAM_BUF __iob
#define FCNT _NFILES
#define FLAG _flag
#else /* MSC, ZTC++ */
#define STREAM_BUF _iob
#define FCNT _NFILE
#define FLAG _flag
#endif
int favail(void)
{
int i, count;
for (i = count = 0; i < FCNT; ++i)
{
if (0 == STREAM_BUF[i].FLAG)
++count;
}
return count;
}
#ifdef TEST
main()
{
char *fname = "A$$$$$$$.$$$";
FILE *fp;
do
{
int i = favail();
printf("You can fopen %d new file%s\n", i, &"s"[i == 1]);
fp = fopen(fname, "w");
*fname += 1;
} while (fp);
do
{
printf("removing %s\n", fname);
remove(fname);
} while ('A' <= --(*fname)) ;
return 0;
}
#endif /*TEST */